3.58 \(\int \frac{d+e x^2+f x^4}{x^2 \left (a+b x^2+c x^4\right )} \, dx\)

Optimal. Leaf size=213 \[ -\frac{\tan ^{-1}\left (\frac{\sqrt{2} \sqrt{c} x}{\sqrt{b-\sqrt{b^2-4 a c}}}\right ) \left (\frac{a b f-2 a c e+b c d}{\sqrt{b^2-4 a c}}-a f+c d\right )}{\sqrt{2} a \sqrt{c} \sqrt{b-\sqrt{b^2-4 a c}}}-\frac{\tan ^{-1}\left (\frac{\sqrt{2} \sqrt{c} x}{\sqrt{\sqrt{b^2-4 a c}+b}}\right ) \left (-\frac{a b f-2 a c e+b c d}{\sqrt{b^2-4 a c}}-a f+c d\right )}{\sqrt{2} a \sqrt{c} \sqrt{\sqrt{b^2-4 a c}+b}}-\frac{d}{a x} \]

[Out]

-(d/(a*x)) - ((c*d - a*f + (b*c*d - 2*a*c*e + a*b*f)/Sqrt[b^2 - 4*a*c])*ArcTan[(
Sqrt[2]*Sqrt[c]*x)/Sqrt[b - Sqrt[b^2 - 4*a*c]]])/(Sqrt[2]*a*Sqrt[c]*Sqrt[b - Sqr
t[b^2 - 4*a*c]]) - ((c*d - a*f - (b*c*d - 2*a*c*e + a*b*f)/Sqrt[b^2 - 4*a*c])*Ar
cTan[(Sqrt[2]*Sqrt[c]*x)/Sqrt[b + Sqrt[b^2 - 4*a*c]]])/(Sqrt[2]*a*Sqrt[c]*Sqrt[b
 + Sqrt[b^2 - 4*a*c]])

_______________________________________________________________________________________

Rubi [A]  time = 1.75355, antiderivative size = 213, normalized size of antiderivative = 1., number of steps used = 5, number of rules used = 3, integrand size = 30, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.1 \[ -\frac{\tan ^{-1}\left (\frac{\sqrt{2} \sqrt{c} x}{\sqrt{b-\sqrt{b^2-4 a c}}}\right ) \left (\frac{a b f-2 a c e+b c d}{\sqrt{b^2-4 a c}}-a f+c d\right )}{\sqrt{2} a \sqrt{c} \sqrt{b-\sqrt{b^2-4 a c}}}-\frac{\tan ^{-1}\left (\frac{\sqrt{2} \sqrt{c} x}{\sqrt{\sqrt{b^2-4 a c}+b}}\right ) \left (-\frac{a b f-2 a c e+b c d}{\sqrt{b^2-4 a c}}-a f+c d\right )}{\sqrt{2} a \sqrt{c} \sqrt{\sqrt{b^2-4 a c}+b}}-\frac{d}{a x} \]

Antiderivative was successfully verified.

[In]  Int[(d + e*x^2 + f*x^4)/(x^2*(a + b*x^2 + c*x^4)),x]

[Out]

-(d/(a*x)) - ((c*d - a*f + (b*c*d - 2*a*c*e + a*b*f)/Sqrt[b^2 - 4*a*c])*ArcTan[(
Sqrt[2]*Sqrt[c]*x)/Sqrt[b - Sqrt[b^2 - 4*a*c]]])/(Sqrt[2]*a*Sqrt[c]*Sqrt[b - Sqr
t[b^2 - 4*a*c]]) - ((c*d - a*f - (b*c*d - 2*a*c*e + a*b*f)/Sqrt[b^2 - 4*a*c])*Ar
cTan[(Sqrt[2]*Sqrt[c]*x)/Sqrt[b + Sqrt[b^2 - 4*a*c]]])/(Sqrt[2]*a*Sqrt[c]*Sqrt[b
 + Sqrt[b^2 - 4*a*c]])

_______________________________________________________________________________________

Rubi in Sympy [A]  time = 74.1687, size = 235, normalized size = 1.1 \[ - \frac{f}{c x} + \frac{a f - c d}{a c x} + \frac{\sqrt{2} \left (b \left (a f - c d\right ) - 2 c \left (a e - b d\right ) + \sqrt{- 4 a c + b^{2}} \left (a f - c d\right )\right ) \operatorname{atan}{\left (\frac{\sqrt{2} \sqrt{c} x}{\sqrt{b + \sqrt{- 4 a c + b^{2}}}} \right )}}{2 a \sqrt{c} \sqrt{b + \sqrt{- 4 a c + b^{2}}} \sqrt{- 4 a c + b^{2}}} + \frac{\sqrt{2} \left (- a b f + 2 a c e - b c d + \sqrt{- 4 a c + b^{2}} \left (a f - c d\right )\right ) \operatorname{atan}{\left (\frac{\sqrt{2} \sqrt{c} x}{\sqrt{b - \sqrt{- 4 a c + b^{2}}}} \right )}}{2 a \sqrt{c} \sqrt{b - \sqrt{- 4 a c + b^{2}}} \sqrt{- 4 a c + b^{2}}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate((f*x**4+e*x**2+d)/x**2/(c*x**4+b*x**2+a),x)

[Out]

-f/(c*x) + (a*f - c*d)/(a*c*x) + sqrt(2)*(b*(a*f - c*d) - 2*c*(a*e - b*d) + sqrt
(-4*a*c + b**2)*(a*f - c*d))*atan(sqrt(2)*sqrt(c)*x/sqrt(b + sqrt(-4*a*c + b**2)
))/(2*a*sqrt(c)*sqrt(b + sqrt(-4*a*c + b**2))*sqrt(-4*a*c + b**2)) + sqrt(2)*(-a
*b*f + 2*a*c*e - b*c*d + sqrt(-4*a*c + b**2)*(a*f - c*d))*atan(sqrt(2)*sqrt(c)*x
/sqrt(b - sqrt(-4*a*c + b**2)))/(2*a*sqrt(c)*sqrt(b - sqrt(-4*a*c + b**2))*sqrt(
-4*a*c + b**2))

_______________________________________________________________________________________

Mathematica [A]  time = 0.60748, size = 253, normalized size = 1.19 \[ \frac{-\frac{\sqrt{2} \tan ^{-1}\left (\frac{\sqrt{2} \sqrt{c} x}{\sqrt{b-\sqrt{b^2-4 a c}}}\right ) \left (c d \sqrt{b^2-4 a c}-a f \sqrt{b^2-4 a c}+a b f-2 a c e+b c d\right )}{\sqrt{c} \sqrt{b^2-4 a c} \sqrt{b-\sqrt{b^2-4 a c}}}+\frac{\sqrt{2} \tan ^{-1}\left (\frac{\sqrt{2} \sqrt{c} x}{\sqrt{\sqrt{b^2-4 a c}+b}}\right ) \left (-c d \sqrt{b^2-4 a c}+a f \sqrt{b^2-4 a c}+a b f-2 a c e+b c d\right )}{\sqrt{c} \sqrt{b^2-4 a c} \sqrt{\sqrt{b^2-4 a c}+b}}-\frac{2 d}{x}}{2 a} \]

Antiderivative was successfully verified.

[In]  Integrate[(d + e*x^2 + f*x^4)/(x^2*(a + b*x^2 + c*x^4)),x]

[Out]

((-2*d)/x - (Sqrt[2]*(b*c*d + c*Sqrt[b^2 - 4*a*c]*d - 2*a*c*e + a*b*f - a*Sqrt[b
^2 - 4*a*c]*f)*ArcTan[(Sqrt[2]*Sqrt[c]*x)/Sqrt[b - Sqrt[b^2 - 4*a*c]]])/(Sqrt[c]
*Sqrt[b^2 - 4*a*c]*Sqrt[b - Sqrt[b^2 - 4*a*c]]) + (Sqrt[2]*(b*c*d - c*Sqrt[b^2 -
 4*a*c]*d - 2*a*c*e + a*b*f + a*Sqrt[b^2 - 4*a*c]*f)*ArcTan[(Sqrt[2]*Sqrt[c]*x)/
Sqrt[b + Sqrt[b^2 - 4*a*c]]])/(Sqrt[c]*Sqrt[b^2 - 4*a*c]*Sqrt[b + Sqrt[b^2 - 4*a
*c]]))/(2*a)

_______________________________________________________________________________________

Maple [B]  time = 0.031, size = 563, normalized size = 2.6 \[ \text{result too large to display} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int((f*x^4+e*x^2+d)/x^2/(c*x^4+b*x^2+a),x)

[Out]

1/2*2^(1/2)/((b+(-4*a*c+b^2)^(1/2))*c)^(1/2)*arctan(c*x*2^(1/2)/((b+(-4*a*c+b^2)
^(1/2))*c)^(1/2))*f-1/2*c/a*2^(1/2)/((b+(-4*a*c+b^2)^(1/2))*c)^(1/2)*arctan(c*x*
2^(1/2)/((b+(-4*a*c+b^2)^(1/2))*c)^(1/2))*d+1/2/(-4*a*c+b^2)^(1/2)*2^(1/2)/((b+(
-4*a*c+b^2)^(1/2))*c)^(1/2)*arctan(c*x*2^(1/2)/((b+(-4*a*c+b^2)^(1/2))*c)^(1/2))
*b*f-c/(-4*a*c+b^2)^(1/2)*2^(1/2)/((b+(-4*a*c+b^2)^(1/2))*c)^(1/2)*arctan(c*x*2^
(1/2)/((b+(-4*a*c+b^2)^(1/2))*c)^(1/2))*e+1/2*c/a/(-4*a*c+b^2)^(1/2)*2^(1/2)/((b
+(-4*a*c+b^2)^(1/2))*c)^(1/2)*arctan(c*x*2^(1/2)/((b+(-4*a*c+b^2)^(1/2))*c)^(1/2
))*b*d-1/2*2^(1/2)/((-b+(-4*a*c+b^2)^(1/2))*c)^(1/2)*arctanh(c*x*2^(1/2)/((-b+(-
4*a*c+b^2)^(1/2))*c)^(1/2))*f+1/2*c/a*2^(1/2)/((-b+(-4*a*c+b^2)^(1/2))*c)^(1/2)*
arctanh(c*x*2^(1/2)/((-b+(-4*a*c+b^2)^(1/2))*c)^(1/2))*d+1/2/(-4*a*c+b^2)^(1/2)*
2^(1/2)/((-b+(-4*a*c+b^2)^(1/2))*c)^(1/2)*arctanh(c*x*2^(1/2)/((-b+(-4*a*c+b^2)^
(1/2))*c)^(1/2))*b*f-c/(-4*a*c+b^2)^(1/2)*2^(1/2)/((-b+(-4*a*c+b^2)^(1/2))*c)^(1
/2)*arctanh(c*x*2^(1/2)/((-b+(-4*a*c+b^2)^(1/2))*c)^(1/2))*e+1/2*c/a/(-4*a*c+b^2
)^(1/2)*2^(1/2)/((-b+(-4*a*c+b^2)^(1/2))*c)^(1/2)*arctanh(c*x*2^(1/2)/((-b+(-4*a
*c+b^2)^(1/2))*c)^(1/2))*b*d-d/a/x

_______________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \[ \frac{-\int \frac{{\left (c d - a f\right )} x^{2} + b d - a e}{c x^{4} + b x^{2} + a}\,{d x}}{a} - \frac{d}{a x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((f*x^4 + e*x^2 + d)/((c*x^4 + b*x^2 + a)*x^2),x, algorithm="maxima")

[Out]

integrate(-((c*d - a*f)*x^2 + b*d - a*e)/(c*x^4 + b*x^2 + a), x)/a - d/(a*x)

_______________________________________________________________________________________

Fricas [A]  time = 0.931088, size = 8006, normalized size = 37.59 \[ \text{result too large to display} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((f*x^4 + e*x^2 + d)/((c*x^4 + b*x^2 + a)*x^2),x, algorithm="fricas")

[Out]

-1/2*(sqrt(1/2)*a*x*sqrt(-(a^2*b*c*e^2 + a^3*b*f^2 + (b^3*c - 3*a*b*c^2)*d^2 - 2
*(a*b^2*c - 2*a^2*c^2)*d*e + 2*(a^2*b*c*d - 2*a^3*c*e)*f + (a^3*b^2*c - 4*a^4*c^
2)*sqrt(-(4*a^3*b*c^2*d*e^3 - a^4*c^2*e^4 + 4*a^5*c*d*f^3 - a^6*f^4 - (b^4*c^2 -
 2*a*b^2*c^3 + a^2*c^4)*d^4 + 4*(a*b^3*c^2 - a^2*b*c^3)*d^3*e - 2*(3*a^2*b^2*c^2
 - a^3*c^3)*d^2*e^2 - 2*(2*a^4*b*c*d*e - a^5*c*e^2 - (a^3*b^2*c - 3*a^4*c^2)*d^2
)*f^2 + 4*(2*a^3*b*c^2*d^2*e - a^4*c^2*d*e^2 - (a^2*b^2*c^2 - a^3*c^3)*d^3)*f)/(
a^6*b^2*c^2 - 4*a^7*c^3)))/(a^3*b^2*c - 4*a^4*c^2))*log(-2*(3*a*b^2*c^2*d^2*e^2
- 3*a^2*b*c^2*d*e^3 + a^3*c^2*e^4 - a^5*f^4 + (b^2*c^3 - a*c^4)*d^4 - (b^3*c^2 +
 a*b*c^3)*d^3*e + (a^4*b*e - (a^3*b^2 - 4*a^4*c)*d)*f^3 - 3*(a^3*b*c*d*e - (a^2*
b^2*c - 2*a^3*c^2)*d^2)*f^2 + (3*a^2*b^2*c*d*e^2 - a^3*b*c*e^3 + (b^4*c - 3*a*b^
2*c^2 + 4*a^2*c^3)*d^3 - 3*(a*b^3*c - a^2*b*c^2)*d^2*e)*f)*x + sqrt(1/2)*((b^5*c
 - 5*a*b^3*c^2 + 4*a^2*b*c^3)*d^3 - (3*a*b^4*c - 13*a^2*b^2*c^2 + 4*a^3*c^3)*d^2
*e + 3*(a^2*b^3*c - 4*a^3*b*c^2)*d*e^2 - (a^3*b^2*c - 4*a^4*c^2)*e^3 - ((a^3*b^3
 - 4*a^4*b*c)*d - (a^4*b^2 - 4*a^5*c)*e)*f^2 + 2*((a^2*b^3*c - 4*a^3*b*c^2)*d^2
- (a^3*b^2*c - 4*a^4*c^2)*d*e)*f - ((a^3*b^4*c - 6*a^4*b^2*c^2 + 8*a^5*c^3)*d -
(a^4*b^3*c - 4*a^5*b*c^2)*e + 2*(a^5*b^2*c - 4*a^6*c^2)*f)*sqrt(-(4*a^3*b*c^2*d*
e^3 - a^4*c^2*e^4 + 4*a^5*c*d*f^3 - a^6*f^4 - (b^4*c^2 - 2*a*b^2*c^3 + a^2*c^4)*
d^4 + 4*(a*b^3*c^2 - a^2*b*c^3)*d^3*e - 2*(3*a^2*b^2*c^2 - a^3*c^3)*d^2*e^2 - 2*
(2*a^4*b*c*d*e - a^5*c*e^2 - (a^3*b^2*c - 3*a^4*c^2)*d^2)*f^2 + 4*(2*a^3*b*c^2*d
^2*e - a^4*c^2*d*e^2 - (a^2*b^2*c^2 - a^3*c^3)*d^3)*f)/(a^6*b^2*c^2 - 4*a^7*c^3)
))*sqrt(-(a^2*b*c*e^2 + a^3*b*f^2 + (b^3*c - 3*a*b*c^2)*d^2 - 2*(a*b^2*c - 2*a^2
*c^2)*d*e + 2*(a^2*b*c*d - 2*a^3*c*e)*f + (a^3*b^2*c - 4*a^4*c^2)*sqrt(-(4*a^3*b
*c^2*d*e^3 - a^4*c^2*e^4 + 4*a^5*c*d*f^3 - a^6*f^4 - (b^4*c^2 - 2*a*b^2*c^3 + a^
2*c^4)*d^4 + 4*(a*b^3*c^2 - a^2*b*c^3)*d^3*e - 2*(3*a^2*b^2*c^2 - a^3*c^3)*d^2*e
^2 - 2*(2*a^4*b*c*d*e - a^5*c*e^2 - (a^3*b^2*c - 3*a^4*c^2)*d^2)*f^2 + 4*(2*a^3*
b*c^2*d^2*e - a^4*c^2*d*e^2 - (a^2*b^2*c^2 - a^3*c^3)*d^3)*f)/(a^6*b^2*c^2 - 4*a
^7*c^3)))/(a^3*b^2*c - 4*a^4*c^2))) - sqrt(1/2)*a*x*sqrt(-(a^2*b*c*e^2 + a^3*b*f
^2 + (b^3*c - 3*a*b*c^2)*d^2 - 2*(a*b^2*c - 2*a^2*c^2)*d*e + 2*(a^2*b*c*d - 2*a^
3*c*e)*f + (a^3*b^2*c - 4*a^4*c^2)*sqrt(-(4*a^3*b*c^2*d*e^3 - a^4*c^2*e^4 + 4*a^
5*c*d*f^3 - a^6*f^4 - (b^4*c^2 - 2*a*b^2*c^3 + a^2*c^4)*d^4 + 4*(a*b^3*c^2 - a^2
*b*c^3)*d^3*e - 2*(3*a^2*b^2*c^2 - a^3*c^3)*d^2*e^2 - 2*(2*a^4*b*c*d*e - a^5*c*e
^2 - (a^3*b^2*c - 3*a^4*c^2)*d^2)*f^2 + 4*(2*a^3*b*c^2*d^2*e - a^4*c^2*d*e^2 - (
a^2*b^2*c^2 - a^3*c^3)*d^3)*f)/(a^6*b^2*c^2 - 4*a^7*c^3)))/(a^3*b^2*c - 4*a^4*c^
2))*log(-2*(3*a*b^2*c^2*d^2*e^2 - 3*a^2*b*c^2*d*e^3 + a^3*c^2*e^4 - a^5*f^4 + (b
^2*c^3 - a*c^4)*d^4 - (b^3*c^2 + a*b*c^3)*d^3*e + (a^4*b*e - (a^3*b^2 - 4*a^4*c)
*d)*f^3 - 3*(a^3*b*c*d*e - (a^2*b^2*c - 2*a^3*c^2)*d^2)*f^2 + (3*a^2*b^2*c*d*e^2
 - a^3*b*c*e^3 + (b^4*c - 3*a*b^2*c^2 + 4*a^2*c^3)*d^3 - 3*(a*b^3*c - a^2*b*c^2)
*d^2*e)*f)*x - sqrt(1/2)*((b^5*c - 5*a*b^3*c^2 + 4*a^2*b*c^3)*d^3 - (3*a*b^4*c -
 13*a^2*b^2*c^2 + 4*a^3*c^3)*d^2*e + 3*(a^2*b^3*c - 4*a^3*b*c^2)*d*e^2 - (a^3*b^
2*c - 4*a^4*c^2)*e^3 - ((a^3*b^3 - 4*a^4*b*c)*d - (a^4*b^2 - 4*a^5*c)*e)*f^2 + 2
*((a^2*b^3*c - 4*a^3*b*c^2)*d^2 - (a^3*b^2*c - 4*a^4*c^2)*d*e)*f - ((a^3*b^4*c -
 6*a^4*b^2*c^2 + 8*a^5*c^3)*d - (a^4*b^3*c - 4*a^5*b*c^2)*e + 2*(a^5*b^2*c - 4*a
^6*c^2)*f)*sqrt(-(4*a^3*b*c^2*d*e^3 - a^4*c^2*e^4 + 4*a^5*c*d*f^3 - a^6*f^4 - (b
^4*c^2 - 2*a*b^2*c^3 + a^2*c^4)*d^4 + 4*(a*b^3*c^2 - a^2*b*c^3)*d^3*e - 2*(3*a^2
*b^2*c^2 - a^3*c^3)*d^2*e^2 - 2*(2*a^4*b*c*d*e - a^5*c*e^2 - (a^3*b^2*c - 3*a^4*
c^2)*d^2)*f^2 + 4*(2*a^3*b*c^2*d^2*e - a^4*c^2*d*e^2 - (a^2*b^2*c^2 - a^3*c^3)*d
^3)*f)/(a^6*b^2*c^2 - 4*a^7*c^3)))*sqrt(-(a^2*b*c*e^2 + a^3*b*f^2 + (b^3*c - 3*a
*b*c^2)*d^2 - 2*(a*b^2*c - 2*a^2*c^2)*d*e + 2*(a^2*b*c*d - 2*a^3*c*e)*f + (a^3*b
^2*c - 4*a^4*c^2)*sqrt(-(4*a^3*b*c^2*d*e^3 - a^4*c^2*e^4 + 4*a^5*c*d*f^3 - a^6*f
^4 - (b^4*c^2 - 2*a*b^2*c^3 + a^2*c^4)*d^4 + 4*(a*b^3*c^2 - a^2*b*c^3)*d^3*e - 2
*(3*a^2*b^2*c^2 - a^3*c^3)*d^2*e^2 - 2*(2*a^4*b*c*d*e - a^5*c*e^2 - (a^3*b^2*c -
 3*a^4*c^2)*d^2)*f^2 + 4*(2*a^3*b*c^2*d^2*e - a^4*c^2*d*e^2 - (a^2*b^2*c^2 - a^3
*c^3)*d^3)*f)/(a^6*b^2*c^2 - 4*a^7*c^3)))/(a^3*b^2*c - 4*a^4*c^2))) + sqrt(1/2)*
a*x*sqrt(-(a^2*b*c*e^2 + a^3*b*f^2 + (b^3*c - 3*a*b*c^2)*d^2 - 2*(a*b^2*c - 2*a^
2*c^2)*d*e + 2*(a^2*b*c*d - 2*a^3*c*e)*f - (a^3*b^2*c - 4*a^4*c^2)*sqrt(-(4*a^3*
b*c^2*d*e^3 - a^4*c^2*e^4 + 4*a^5*c*d*f^3 - a^6*f^4 - (b^4*c^2 - 2*a*b^2*c^3 + a
^2*c^4)*d^4 + 4*(a*b^3*c^2 - a^2*b*c^3)*d^3*e - 2*(3*a^2*b^2*c^2 - a^3*c^3)*d^2*
e^2 - 2*(2*a^4*b*c*d*e - a^5*c*e^2 - (a^3*b^2*c - 3*a^4*c^2)*d^2)*f^2 + 4*(2*a^3
*b*c^2*d^2*e - a^4*c^2*d*e^2 - (a^2*b^2*c^2 - a^3*c^3)*d^3)*f)/(a^6*b^2*c^2 - 4*
a^7*c^3)))/(a^3*b^2*c - 4*a^4*c^2))*log(-2*(3*a*b^2*c^2*d^2*e^2 - 3*a^2*b*c^2*d*
e^3 + a^3*c^2*e^4 - a^5*f^4 + (b^2*c^3 - a*c^4)*d^4 - (b^3*c^2 + a*b*c^3)*d^3*e
+ (a^4*b*e - (a^3*b^2 - 4*a^4*c)*d)*f^3 - 3*(a^3*b*c*d*e - (a^2*b^2*c - 2*a^3*c^
2)*d^2)*f^2 + (3*a^2*b^2*c*d*e^2 - a^3*b*c*e^3 + (b^4*c - 3*a*b^2*c^2 + 4*a^2*c^
3)*d^3 - 3*(a*b^3*c - a^2*b*c^2)*d^2*e)*f)*x + sqrt(1/2)*((b^5*c - 5*a*b^3*c^2 +
 4*a^2*b*c^3)*d^3 - (3*a*b^4*c - 13*a^2*b^2*c^2 + 4*a^3*c^3)*d^2*e + 3*(a^2*b^3*
c - 4*a^3*b*c^2)*d*e^2 - (a^3*b^2*c - 4*a^4*c^2)*e^3 - ((a^3*b^3 - 4*a^4*b*c)*d
- (a^4*b^2 - 4*a^5*c)*e)*f^2 + 2*((a^2*b^3*c - 4*a^3*b*c^2)*d^2 - (a^3*b^2*c - 4
*a^4*c^2)*d*e)*f + ((a^3*b^4*c - 6*a^4*b^2*c^2 + 8*a^5*c^3)*d - (a^4*b^3*c - 4*a
^5*b*c^2)*e + 2*(a^5*b^2*c - 4*a^6*c^2)*f)*sqrt(-(4*a^3*b*c^2*d*e^3 - a^4*c^2*e^
4 + 4*a^5*c*d*f^3 - a^6*f^4 - (b^4*c^2 - 2*a*b^2*c^3 + a^2*c^4)*d^4 + 4*(a*b^3*c
^2 - a^2*b*c^3)*d^3*e - 2*(3*a^2*b^2*c^2 - a^3*c^3)*d^2*e^2 - 2*(2*a^4*b*c*d*e -
 a^5*c*e^2 - (a^3*b^2*c - 3*a^4*c^2)*d^2)*f^2 + 4*(2*a^3*b*c^2*d^2*e - a^4*c^2*d
*e^2 - (a^2*b^2*c^2 - a^3*c^3)*d^3)*f)/(a^6*b^2*c^2 - 4*a^7*c^3)))*sqrt(-(a^2*b*
c*e^2 + a^3*b*f^2 + (b^3*c - 3*a*b*c^2)*d^2 - 2*(a*b^2*c - 2*a^2*c^2)*d*e + 2*(a
^2*b*c*d - 2*a^3*c*e)*f - (a^3*b^2*c - 4*a^4*c^2)*sqrt(-(4*a^3*b*c^2*d*e^3 - a^4
*c^2*e^4 + 4*a^5*c*d*f^3 - a^6*f^4 - (b^4*c^2 - 2*a*b^2*c^3 + a^2*c^4)*d^4 + 4*(
a*b^3*c^2 - a^2*b*c^3)*d^3*e - 2*(3*a^2*b^2*c^2 - a^3*c^3)*d^2*e^2 - 2*(2*a^4*b*
c*d*e - a^5*c*e^2 - (a^3*b^2*c - 3*a^4*c^2)*d^2)*f^2 + 4*(2*a^3*b*c^2*d^2*e - a^
4*c^2*d*e^2 - (a^2*b^2*c^2 - a^3*c^3)*d^3)*f)/(a^6*b^2*c^2 - 4*a^7*c^3)))/(a^3*b
^2*c - 4*a^4*c^2))) - sqrt(1/2)*a*x*sqrt(-(a^2*b*c*e^2 + a^3*b*f^2 + (b^3*c - 3*
a*b*c^2)*d^2 - 2*(a*b^2*c - 2*a^2*c^2)*d*e + 2*(a^2*b*c*d - 2*a^3*c*e)*f - (a^3*
b^2*c - 4*a^4*c^2)*sqrt(-(4*a^3*b*c^2*d*e^3 - a^4*c^2*e^4 + 4*a^5*c*d*f^3 - a^6*
f^4 - (b^4*c^2 - 2*a*b^2*c^3 + a^2*c^4)*d^4 + 4*(a*b^3*c^2 - a^2*b*c^3)*d^3*e -
2*(3*a^2*b^2*c^2 - a^3*c^3)*d^2*e^2 - 2*(2*a^4*b*c*d*e - a^5*c*e^2 - (a^3*b^2*c
- 3*a^4*c^2)*d^2)*f^2 + 4*(2*a^3*b*c^2*d^2*e - a^4*c^2*d*e^2 - (a^2*b^2*c^2 - a^
3*c^3)*d^3)*f)/(a^6*b^2*c^2 - 4*a^7*c^3)))/(a^3*b^2*c - 4*a^4*c^2))*log(-2*(3*a*
b^2*c^2*d^2*e^2 - 3*a^2*b*c^2*d*e^3 + a^3*c^2*e^4 - a^5*f^4 + (b^2*c^3 - a*c^4)*
d^4 - (b^3*c^2 + a*b*c^3)*d^3*e + (a^4*b*e - (a^3*b^2 - 4*a^4*c)*d)*f^3 - 3*(a^3
*b*c*d*e - (a^2*b^2*c - 2*a^3*c^2)*d^2)*f^2 + (3*a^2*b^2*c*d*e^2 - a^3*b*c*e^3 +
 (b^4*c - 3*a*b^2*c^2 + 4*a^2*c^3)*d^3 - 3*(a*b^3*c - a^2*b*c^2)*d^2*e)*f)*x - s
qrt(1/2)*((b^5*c - 5*a*b^3*c^2 + 4*a^2*b*c^3)*d^3 - (3*a*b^4*c - 13*a^2*b^2*c^2
+ 4*a^3*c^3)*d^2*e + 3*(a^2*b^3*c - 4*a^3*b*c^2)*d*e^2 - (a^3*b^2*c - 4*a^4*c^2)
*e^3 - ((a^3*b^3 - 4*a^4*b*c)*d - (a^4*b^2 - 4*a^5*c)*e)*f^2 + 2*((a^2*b^3*c - 4
*a^3*b*c^2)*d^2 - (a^3*b^2*c - 4*a^4*c^2)*d*e)*f + ((a^3*b^4*c - 6*a^4*b^2*c^2 +
 8*a^5*c^3)*d - (a^4*b^3*c - 4*a^5*b*c^2)*e + 2*(a^5*b^2*c - 4*a^6*c^2)*f)*sqrt(
-(4*a^3*b*c^2*d*e^3 - a^4*c^2*e^4 + 4*a^5*c*d*f^3 - a^6*f^4 - (b^4*c^2 - 2*a*b^2
*c^3 + a^2*c^4)*d^4 + 4*(a*b^3*c^2 - a^2*b*c^3)*d^3*e - 2*(3*a^2*b^2*c^2 - a^3*c
^3)*d^2*e^2 - 2*(2*a^4*b*c*d*e - a^5*c*e^2 - (a^3*b^2*c - 3*a^4*c^2)*d^2)*f^2 +
4*(2*a^3*b*c^2*d^2*e - a^4*c^2*d*e^2 - (a^2*b^2*c^2 - a^3*c^3)*d^3)*f)/(a^6*b^2*
c^2 - 4*a^7*c^3)))*sqrt(-(a^2*b*c*e^2 + a^3*b*f^2 + (b^3*c - 3*a*b*c^2)*d^2 - 2*
(a*b^2*c - 2*a^2*c^2)*d*e + 2*(a^2*b*c*d - 2*a^3*c*e)*f - (a^3*b^2*c - 4*a^4*c^2
)*sqrt(-(4*a^3*b*c^2*d*e^3 - a^4*c^2*e^4 + 4*a^5*c*d*f^3 - a^6*f^4 - (b^4*c^2 -
2*a*b^2*c^3 + a^2*c^4)*d^4 + 4*(a*b^3*c^2 - a^2*b*c^3)*d^3*e - 2*(3*a^2*b^2*c^2
- a^3*c^3)*d^2*e^2 - 2*(2*a^4*b*c*d*e - a^5*c*e^2 - (a^3*b^2*c - 3*a^4*c^2)*d^2)
*f^2 + 4*(2*a^3*b*c^2*d^2*e - a^4*c^2*d*e^2 - (a^2*b^2*c^2 - a^3*c^3)*d^3)*f)/(a
^6*b^2*c^2 - 4*a^7*c^3)))/(a^3*b^2*c - 4*a^4*c^2))) + 2*d)/(a*x)

_______________________________________________________________________________________

Sympy [F(-1)]  time = 0., size = 0, normalized size = 0. \[ \text{Timed out} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((f*x**4+e*x**2+d)/x**2/(c*x**4+b*x**2+a),x)

[Out]

Timed out

_______________________________________________________________________________________

GIAC/XCAS [A]  time = 1.26817, size = 1, normalized size = 0. \[ \mathit{Done} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((f*x^4 + e*x^2 + d)/((c*x^4 + b*x^2 + a)*x^2),x, algorithm="giac")

[Out]

Done